home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gold Medal Software 2
/
Gold Medal Software Volume 2 (Gold Medal) (1994).iso
/
prog
/
pclcjs.arj
/
CLEAR.C
< prev
next >
Wrap
C/C++ Source or Header
|
1993-01-14
|
352b
|
28 lines
/* Test of new clearscreen function */
#include <dos.h>
#include "cjslib.h"
int clear(int color)
{
union REGS regs;
regs.h.ah=6;
regs.h.al=0;
regs.h.ch=0;
regs.h.cl=0;
regs.h.dh=screen_lines();
regs.h.dl=79;
regs.h.bh=color*16+7;
if (regs.h.dh==0)
regs.h.dh=24;
int86(0x10,®s,®s);
return;
}